object fmCheckProductReport: TfmCheckProductReport
  Left = 0
  Top = 0
  BorderStyle = bsDialog
  Caption = #20135#21697#22411#21495#30456#20284
  ClientHeight = 303
  ClientWidth = 469
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object grdProduct: TcxGrid
    Left = 8
    Top = 12
    Width = 453
    Height = 247
    TabOrder = 0
    object tvProduct: TcxGridDBTableView
      NavigatorButtons.ConfirmDelete = False
      DataController.DataSource = dsBrowser
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <>
      DataController.Summary.SummaryGroups = <>
      OptionsView.GroupByBox = False
      object tvProductColumn1: TcxGridDBColumn
        Caption = #20869#37096#32534#21495
        DataBinding.FieldName = 'bpi_no'
        Options.Editing = False
        Width = 80
      end
      object tvProductColumn2: TcxGridDBColumn
        Caption = #20135#21697#22411#21495
        DataBinding.FieldName = 'bpi_realno'
        Options.Editing = False
        Width = 160
      end
      object tvProductColumn4: TcxGridDBColumn
        Caption = #20135#21697#22823#31867
        DataBinding.FieldName = 'bpi_cname'
        Options.Editing = False
        Width = 80
      end
      object tvProductColumn3: TcxGridDBColumn
        Caption = #20027#35201#20379#24212#21830
        DataBinding.FieldName = 'bpi_fsimpname'
        Options.Editing = False
        Width = 120
      end
    end
    object lvProduct: TcxGridLevel
      GridView = tvProduct
    end
  end
  object cxButton1: TcxButton
    Left = 309
    Top = 270
    Width = 70
    Height = 21
    Caption = #20445#23384
    ModalResult = 1
    TabOrder = 1
  end
  object cxButton2: TcxButton
    Left = 390
    Top = 270
    Width = 70
    Height = 21
    Caption = #21462#28040
    ModalResult = 2
    TabOrder = 2
  end
  object cxLabel2: TcxLabel
    Left = 12
    Top = 271
    Caption = #24050#26377#31867#20284#20135#21697#22411#21495#30340#20135#21697#23384#22312','#32487#32493#20445#23384#21527#65311
  end
  object dsBrowser: TDADataSource
    DataSet = tblBrowser.Dataset
    DataTable = tblBrowser
    Left = 180
    Top = 166
  end
  object tblBrowser: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'bpi_no'
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rdaBrowser
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'b_productinfo'
    IndexDefs = <>
    Left = 210
    Top = 166
  end
  object rdaBrowser: TDARemoteDataAdapter
    GetSchemaCall.RemoteService = ClientDataModule.RemoteService
    GetDataCall.RemoteService = ClientDataModule.RemoteService
    GetDataCall.MethodName = 'SQLGetData'
    GetDataCall.Params = <
      item
        Name = 'Result'
        DataType = rtBinary
        Flag = fResult
      end
      item
        Name = 'aSQLText'
        DataType = rtString
        Flag = fIn
      end
      item
        Name = 'aIncludeSchema'
        DataType = rtBoolean
        Flag = fIn
      end
      item
        Name = 'aMaxRecords'
        DataType = rtInteger
        Flag = fIn
      end>
    GetDataCall.Default = False
    GetDataCall.OutgoingTableNamesParameter = 'aTableNameArray'
    GetDataCall.OutgoingTableRequestInfosParameter = 'aTableRequestInfoArray'
    GetDataCall.IncomingDataParameter = 'Result'
    GetDataCall.OutgoingIncludeSchemaParameter = 'aIncludeSchema'
    GetDataCall.OutgoingMaxRecordsParameter = 'aMaxRecords'
    UpdateDataCall.RemoteService = ClientDataModule.RemoteService
    GetScriptsCall.RemoteService = ClientDataModule.RemoteService
    RemoteService = ClientDataModule.RemoteService
    DataStreamer = ClientDataModule.DataStreamer
    Left = 238
    Top = 166
  end
end
